home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Bavarian / Bavarian #056 (19xx)(APS Electronic).zip / Bavarian #056 (19xx)(APS Electronic).adf / godzilla.inp < prev    next >
Text File  |  1987-08-11  |  3KB  |  162 lines
  1. /**********************************************************************
  2.  * Godzilla picture - Dave Wecker
  3.  *    v1.0 870702 DBW
  4.  **********************************************************************/
  5.  
  6.  
  7. message "Creating Godzilla macros"
  8.  
  9. macro GZAttributes
  10.     attribute GZAttBody
  11.     texture  = 0
  12.     fuzz     = 3
  13.     mirror     = 0
  14.     index     = 0
  15.     transparency = 0 0 0
  16.     ambient     = 0 0 0
  17.     diffuse     = .310 .310 .184
  18.     attribute GZAttLetter
  19.     texture    = 3
  20.     fuzz    = 3
  21.     mirror    = .3
  22.     index    = 0
  23.     tran    = 0  0 0
  24.     amb    = .9 0 0
  25.     diff    = 2  0 0
  26.     done GZAttributes
  27. macro GZBody
  28.     object GZAttBody of
  29.     point 0   12   0
  30.     point 3.2 18.5 0
  31.     point 6   21   0
  32.     point 8   25   0
  33.     point 8   28   0
  34.     point 7   31.5 0
  35.     point 6.8 35.8 0
  36.     point 7.2 40   0
  37.     point 4.8 45.2 0
  38.     point 5.3 47.8 0
  39.     point 4   51   0
  40.     point 2   54.8 0
  41.     point 0   56.2 0
  42.     sides 6
  43.     done GZBody
  44. macro GZHead
  45.     object GZAttBody of
  46.     point 0    -3.5 0
  47.     point 9    -5.5 0
  48.     point 10.2 -5.3 0
  49.     point 9.8  -3.7 0
  50.     point 4    -2   0
  51.     point 4.5  -1   0
  52.     point 12.8 -.8  0
  53.     point 12.5  .2  0
  54.     point 8.5  2.2  0
  55.     point 6    5.5  0
  56.     point 3    5.5  0
  57.     point 1    3.8  0
  58.     trans 0 52.5 0
  59.     route
  60.         point    0  0  -3 scale .8
  61.         point    0  0   0
  62.         point    0  0   3 scale .8
  63.     close 1 1
  64.     done GZHead
  65. macro GZTail
  66.     object GZAttBody of
  67.     point -36   -11  0 
  68.     point -29.5 -6   0
  69.     point -26   -7.5 0
  70.     point -20   -11  0
  71.     point -14   -12  0
  72.     point -10   -11  0
  73.     point -3    -6   0
  74.     point  0    -1   0
  75.     point  0    14   0
  76.     point -8    11   0
  77.     point -11   -3   0
  78.     point -13   -4.2 0
  79.     point -29   -3   0
  80.     point -36   -11  0
  81.     trans 0 13 0
  82.     route
  83.         point 0 0 -3 scale .5
  84.         point 0 0  0
  85.         point 0 0  3 scale .5
  86.     close 1 1
  87.     done GZTail
  88. macro GZLeg
  89.     object GZAttBody of
  90.     point   0   .5   0
  91.     point   5   0    0
  92.     point   4   2    0
  93.     point   1.2 2.8  0    
  94.     point   .5  3.5  0
  95.     point   2   6.5  0
  96.     point   2   8    0
  97.     point   3.2 12   0
  98.     point   4   13.5 0 
  99.     point   4   16.2 0
  100.     point   4.8 17.8 0
  101.     point   4    20.5 0
  102.     point   2    21.8 0
  103.     point   0    22   0
  104.     sides 6
  105.     object GZAttBody of
  106.     point   0     -5.5    0
  107.     point   -5     -5.5    0
  108.     point   -5.2 -3.5    0
  109.     point   -4.2 -1.5    0
  110.     point   -4      1    0
  111.     point   -3      4    0
  112.     point    0      6.2    0
  113.     trans 0 6 0
  114.     route
  115.         point 0 0 -3
  116.         point 0 0  3
  117.     close 1 1
  118.     done GZLeg
  119. macro GZArm
  120.     object GZAttBody of
  121.     point   0    0   0
  122.     point   2    3.5 0
  123.     point   2    5.5 0
  124.     point   1.5    7   0
  125.     point   2.5    9   0
  126.     point   2.2    10.5 0
  127.     point   1.2    11.3 0
  128.     point   0    11.5 0
  129.     rotz -20
  130.     trans 3 -13 0
  131.     sides 6
  132.     object GZAttBody of
  133.     point   0    0   0
  134.     point   2    3.5 0
  135.     point   2    5.5 0
  136.     point   1.5    7   0
  137.     point   2.5    9   0
  138.     point   2.2    10.5 0
  139.     point   1.2    11.3 0
  140.     point   0    11.5 0
  141.     rotz  20
  142.     trans -1 -5 0
  143.     sides 6
  144.     done GZArm
  145. macro Godzilla
  146.     GZBody
  147.     GZHead
  148.     GZTail
  149.     GZLeg
  150.     trans -2 5 -7
  151.     GZLeg
  152.     trans -2 5  7
  153.     GZArm
  154.     rotz -110
  155.     trans 0 38 -5
  156.     GZArm
  157.     rotz -90
  158.     trans 0 38  5
  159.     done Godzilla
  160.  
  161.  
  162.